

cd "/Users/john/Dropbox/Turnout/TurnoutProjectNotes/WhoVotes/SurveyStuff"

use Final_Replication_Data, clear

set more off 





***********************************Main Manuscript Tables***************************************************************************************************
************************************************************************************************************************************************************





***********************************Table 1***********************************
******************************************************************************
tab q84_1 
tab q84_2 
tab q84_3 
tab q84_4 
tab q84_5 
tab q84_6 
tab q84_7 
tab q84_8 
tab q84_9 




***********************************Table 2***********************************
******************************************************************************

logit turnout_experiment age male  townsize  kpss  econ   educ number_org , cluster(obl)
margins, dydx(_all) post
outreg2 using "dutytable.tex", replace tex(frag) dec(3) label ctitle("Duty") nonotes 

logit turnout_experiment age male  townsize  kpss  econ   educ number_org follow_pol, cluster(obl)
margins, dydx(_all) post
outreg2 using "dutytable.tex", append tex(frag) dec(3) label ctitle("Duty") nonotes 

logit turnout_experiment age male  townsize  kpss  econ   educ number_org follow_pol  democ_good, cluster(obl)
margins, dydx(_all) post
outreg2 using "dutytable.tex", append tex(frag) dec(3) label ctitle("Duty") 

logit turnout_experiment age male  townsize  kpss  econ   educ number_org follow_pol russia_democ , cluster(obl)
margins, dydx(_all) post
outreg2 using "dutytable.tex", append tex(frag) dec(3) label ctitle("Duty") 

logit turnout_experiment age male  townsize  kpss  econ  educ number_org follow_pol interact russia_democ democ_good, cluster(obl)
margins, dydx(_all) post
outreg2 using "dutytable.tex", append tex(frag) dec(3) label ctitle("Duty") 

logit  turnout_experiment age male  townsize  kpss  econ   educ number_org follow_pol  putin_support   , cluster(obl)
margins, dydx(_all) post
outreg2 using "dutytable.tex", append tex(frag) dec(3) label ctitle("Duty") 

logit  turnout_experiment age male  townsize  kpss  econ   educ number_org follow_pol  ur_support   , cluster(obl)
margins, dydx(_all) post
outreg2 using "dutytable.tex", append tex(frag) dec(3) label ctitle("Duty") 


logit  turnout_experiment age male  townsize  kpss  econ   educ number_org follow_pol   putin_support  corruption_worse x  , cluster(obl)
margins, dydx(_all) post
outreg2 using "dutytable.tex", append tex(frag) dec(3) label ctitle("Duty") 


****************For calculating the conditional effects mentioned in text on pg 20****************
logit  turnout_experiment age male  townsize  kpss  econ   educ number_org follow_pol   c.putin_support##c.corruption_worse  , cluster(obl)
margins, dydx (putin_support) at(corruption_worse=(1(1)3))




***********************************Table 4***********************************
******************************************************************************
*Note that this table requires the "khb" package in STATA.  
**Also note that the table in the paper is edited to include the relevant ouput from the "khb commands"

logit  turnout_experiment age male  townsize  kpss  econ educ number_org follow_pol   putin_support elec_honest   , cluster(obl)
margins, dydx(_all) post
outreg2 using "mechanisms.tex", replace tex(frag) dec(3) label ctitle("Duty") nonotes 
*These are values in bottom rows of Table 3
khb logit turnout_experiment  putin_support   || elec_honest ,  concomitant (age male  townsize  kpss  econ educ number_org follow_pol) vce(cluster obl)  summary   ape
khb logit turnout_experiment  putin_support   || elec_honest ,  concomitant (age male  townsize  kpss  econ educ number_org follow_pol) vce(cluster obl)  summary   
logit  turnout_experiment age male  townsize  kpss  econ   educ number_org follow_pol   putin_support econ_better   , cluster(obl)
margins, dydx(_all) post
outreg2 using "mechanisms.tex", append tex(frag) dec(3) label ctitle("Duty") nonotes 
*These are values in bottom rows of Table 3
khb logit turnout_experiment  putin_support   || econ_better ,  concomitant (age male  townsize  kpss  econ educ number_org follow_pol) vce(cluster obl)  summary   ape
khb logit turnout_experiment  putin_support   || econ_better ,  concomitant (age male  townsize  kpss  econ educ number_org follow_pol) vce(cluster obl)  summary   
logit  turnout_experiment age male  townsize  kpss  econ   educ number_org follow_pol   putin_support crimea   , cluster(obl)
margins, dydx(_all) post
outreg2 using "mechanisms.tex", append tex(frag) dec(3) label ctitle("Duty") nonotes 
*These are values in bottom rows of Table 3
khb logit turnout_experiment  putin_support   || crimea ,  concomitant (age male  townsize  kpss  econ educ number_org follow_pol) vce(cluster obl)  summary  ape
khb logit turnout_experiment  putin_support   || crimea ,  concomitant (age male  townsize  kpss  econ educ number_org follow_pol) vce(cluster obl)  summary  
logit  turnout_experiment age male  townsize  kpss  econ   educ number_org follow_pol   putin_support elec_honest econ_better crimea   , cluster(obl)
margins, dydx(_all) post
outreg2 using "mechanisms.tex", append tex(frag) dec(3) label ctitle("Duty") nonotes 
*These are values in bottom rows of Table 3
khb logit turnout_experiment  putin_support   || elec_honest econ_better crimea ,  concomitant (age male  townsize  kpss  econ educ number_org follow_pol) vce(cluster obl)  summary ape disentangle
khb logit turnout_experiment  putin_support   || elec_honest econ_better crimea ,  concomitant (age male  townsize  kpss  econ educ number_org follow_pol) vce(cluster obl)  summary  disentangle
logit  turnout_experiment age male  townsize  kpss  econ   educ number_org follow_pol   putin_support russian  , cluster(obl)
margins, dydx(_all) post
outreg2 using "mechanisms.tex", append tex(frag) dec(3) label ctitle("Duty") nonotes 
*These are values in bottom rows of Table 3
khb logit turnout_experiment  putin_support   || russian  ,  concomitant (age male  townsize  kpss  econ educ number_org follow_pol) vce(cluster obl)  summary  ape
khb logit turnout_experiment  putin_support   || russian  ,  concomitant (age male  townsize  kpss  econ educ number_org follow_pol) vce(cluster obl)  summary 


***********************************Table 5***********************************
******************************************************************************
**Note that the table in the paper is edited to include information on model specification

logit turnout_experiment age male  townsize  kpss  econ   educ number_org follow_pol putin_support  if anyparty==0, cluster(obl)
margins, dydx(_all) post
outreg2 using "extend.tex", replace tex(frag) dec(3) label ctitle("Duty") nonotes 
logit turnout_experiment age male  townsize  kpss  econ  educ number_org follow_pol putin_support  if social_media==0, cluster(obl)
margins, dydx(_all) post
outreg2 using "extend.tex", append tex(frag) dec(3) label ctitle("Duty") nonotes 
logit  turnout_experiment age male  townsize  kpss  econ   educ number_org follow_pol   putin_support frequent_state_news  , cluster(obl)
margins, dydx(_all) post
outreg2 using "extend.tex", append tex(frag) dec(3) label ctitle("Duty") nonotes 
logit  turnout_experiment age male  townsize  kpss  econ  educ number_org follow_pol  putin_support if   q97~=5 & q57~="revoljucionnaja rabochaja partija" & q57~="NOVAJa PARTIJa BOL''ShEVIKOV" & q57~="PARNAS" & q57~="Parnas" & q57~="parnas" & q57~="998" & q57~="997" & q97~=96  , cluster(obl)
margins, dydx(_all) post
outreg2 using "extend.tex", append tex(frag) dec(3) label ctitle("Duty") nonotes 
logit  turnout_experiment age male  townsize  kpss  econ  educ number_org follow_pol  putin_support i.regionid  if  regionid~=25, cluster(obl)
margins, dydx(_all) post
outreg2 using "extend.tex", append tex(frag) dec(3) label ctitle("Duty") nonotes drop(i.regionid) 
melogit turnout_experiment age male  townsize  kpss  econ  educ number_org follow_pol putin_support  || obl: putin_support
margins, dydx(_all) post
outreg2 using "extend.tex", append tex(frag) dec(3) label ctitle("Duty") nonotes 
logit  turnout_experiment age male  townsize  kpss  econ   educ number_org follow_pol  putin_support ur16 d  , cluster(obl)
margins, dydx(_all) post
outreg2 using "extend.tex", append tex(frag) dec(3) label ctitle("Duty") nonotes 







***********************************Appendix*****************************************************************************************************************
************************************************************************************************************************************************************



***********************************Table A2***********************************
******************************************************************************

keep age male townsize kpss econ  educ number_org  follow_pol   elec_honest russia_democ democ_good econ_better putin_support ur_support crimea corruption_worse ur16 frequent_state_news russian  turnout_experiment 
move turnout_experiment crimea
outreg2 using "des1.tex", replace tex(frag) auto(2) sum(log) label

***********************************Table A4***********************************
******************************************************************************
clear
cd "/Users/john/Dropbox/Turnout/TurnoutProjectNotes/WhoVotes/SurveyStuff"
use Final_Replication_Data, clear
keep age male townsize kpss econ  educ number_org employed econ_better econ_eval change_econ cauc infl stab ineq follow_pol threat perf_index votebuy ask_vote1 anyparty ur_support  elec_honest putin_delight2 putin_hate pressure_vote   putin_support russian crimea syria child food term pension voted turnout_experiment smd_winner_margin
move turnout_experiment crimea
move voted crimea
outreg2 using "des2.tex", replace tex(frag) auto(2) sum(log) label









***********************************Table A5***********************************
******************************************************************************
clear
cd "/Users/john/Dropbox/Turnout/TurnoutProjectNotes/WhoVotes/SurveyStuff"
use Final_Replication_Data, clear
logit voted age male  townsize  kpss  econ   educ number_org  follow_pol  threat votebuy   , cluster(obl)
margins, dydx(_all) post
outreg2 using "vote.tex", replace tex(frag) dec(3) label ctitle("Voted") nonotes
logit voted age male  townsize  kpss  econ   educ number_org  follow_pol employed  ask_vote1   , cluster(obl)
margins, dydx(_all) post
outreg2 using "vote.tex", append tex(frag) dec(3) label ctitle("Voted")
logit voted age male  townsize  kpss  econ   educ number_org follow_pol anyparty   , cluster(obl)
margins, dydx(_all) post
outreg2 using "vote.tex", append tex(frag) dec(3) label ctitle("Voted")
logit voted age male  townsize  kpss  econ   educ number_org follow_pol anyparty econ_better   , cluster(obl)
margins, dydx(_all) post
outreg2 using "vote.tex", append tex(frag) dec(3) label ctitle("Voted")
logit voted age male  townsize  kpss  econ   educ number_org follow_pol anyparty econ_better putin_support  elec_honest putin_delight2 putin_hate   , cluster(obl)
margins, dydx(_all) post
outreg2 using "vote.tex", append tex(frag) dec(3) label ctitle("Voted")
logit voted age male  townsize  kpss  econ   educ number_org follow_pol anyparty econ_better ur_support  elec_honest putin_delight2 putin_hate   , cluster(obl)
margins, dydx(_all) post
outreg2 using "vote.tex", append tex(frag) dec(3) label ctitle("Voted")
logit voted age male  townsize  kpss  econ  educ number_org  follow_pol anyparty econ_better  putin_support  elec_honest putin_delight2 putin_hate   pressure_vote  , cluster(obl)
margins, dydx(_all) post
outreg2 using "vote.tex", append tex(frag) dec(3) label ctitle("Voted")
logit voted age male  townsize  kpss  econ   educ number_org  follow_pol anyparty econ_better putin_support  elec_honest putin_delight2 putin_hate pressure_vote  turnout_experiment   , cluster(obl)
margins, dydx(_all) post
outreg2 using "vote.tex", append tex(frag) dec(3) label ctitle("Voted") 


***********************************Table A6***********************************
******************************************************************************

**Create Variables


**6 or younger in 1991
gen no_soviet=1 if yob>1984 & yob~=.
replace no_soviet=0 if no_soviet==. & yob~=.
** 6 to 15 in 1991
gen child_soviet=1 if yob<1985 & yob>1975
replace child_soviet=0 if child_soviet==. & yob~=.
** 16-22 in 1991
gen adol_soviet=1 if yob<1976 & yob>1968
replace adol_soviet=0 if adol_soviet==. & yob~=.
** 23-40 in 1991
gen adult_soviet=1 if yob<1969 & yob>1950
replace adult_soviet=0 if adult_soviet==. & yob~=.
** Over 40 in 1991
gen full_soviet=1 if yob<1951 & yob~=.
replace full_soviet=0 if full_soviet==. & yob~=.
gen age2=age^2
gen age3=age^3

label variable no_soviet "Younger than 6 or unborn in 1991" 
label variable child_soviet "6-15 in 1991" 
label variable adol_soviet "16-22 in 1991" 
label variable adult_soviet "23-40 in 1991" 
label variable full_soviet "Older than 40 1991" 
label variable age2 "Age Squared"
label variable age3 "Age Cubed"

*Table
logit turnout_experiment  male  townsize  kpss  econ   educ number_org child_soviet adol_soviet adult_soviet full_soviet  , cluster(obl)
margins, dydx(_all) post
outreg2 using "age.tex", replace tex(frag) dec(3) label ctitle("Duty") nonotes 
logit turnout_experiment male  townsize    econ  educ number_org age  if age<33, cluster(obl)
margins, dydx(_all) post
outreg2 using "age.tex", append tex(frag) dec(3) label ctitle("Duty") nonotes 
logit turnout_experiment  male  townsize  kpss  econ   educ number_org age age2 , cluster(obl)
margins, dydx(_all) post
outreg2 using "age.tex", append tex(frag) dec(3) label ctitle("Duty") nonotes 
logit turnout_experiment male  townsize  kpss  econ   educ number_org age age2 age3  , cluster(obl)
margins, dydx(_all) post
outreg2 using "age.tex", append tex(frag) dec(3) label ctitle("Duty") nonotes 



***********************************Table A7***********************************
******************************************************************************

*Bring in Data for 2000
clear
cd "/Users/john/Dropbox/Turnout/TurnoutProjectNotes/WhoVotes/SurveyStuff"
use lev00_labels

*Generate Variables
gen duty=1 if q23_3==2
replace duty=0 if q23_3==1
replace duty=. if q23_11==2

gen age=d2
gen male=1 if d1==1
replace male=0 if d1==2
gen educ=d3
gen econ=d10
gen townsize=rnp
recode townsize (3=1) (1=3)
gen putin_support=1 if q13a==1
replace putin_support=0 if q13a==2


label variable age "Age"
label variable male "Male"
label variable townsize "Town Size"
label variable econ "Economic Status"
label variable educ "Education"
label variable putin_support "Putin Support (Binary)"


***Model 1 in Table A7
logit  duty age male  townsize   econ  educ  putin_support, cluster(z1)
margins, dydx(_all) post
outreg2 using "compare.tex", replace tex(frag) dec(3) label ctitle("2000 Levada Omnibus: Duty") nonotes 

*Bring in Data for 2016

clear
cd "/Users/john/Dropbox/Turnout/TurnoutProjectNotes/WhoVotes/SurveyStuff"
use lev16_mid

*|Generate Variables
gen putin_support=1 if q5A==1
replace putin_support=0 if q5A==2

gen age=qS2
gen male=1 if qS1==1
replace male=0 if qS1==2
gen educ=qS3
gen econ=qD8

gen townsize=qRNP
recode townsize (5=1) (1=5) (2=4) (4=2)


gen duty=1 if q44A_1==1
replace duty=0 if q44A_1~=1


label variable age "Age"
label variable male "Male"
label variable townsize "Town Size"
label variable econ "Economic Status"
label variable educ "Education"
label variable putin_support "Putin Support (Binary)"

***Model 2 in Table A7
logit  duty age male  townsize   econ  educ  putin_support, cluster(qOBL)
margins, dydx(_all) post
outreg2 using "compare.tex", append tex(frag) dec(3) label ctitle("2016 Levada Omnibus: Duty") nonotes 




***********************************Table A8***********************************
******************************************************************************

**Bring Back Main Data
clear
cd "/Users/john/Dropbox/Turnout/TurnoutProjectNotes/WhoVotes/SurveyStuff"
use Final_Replication_Data

**Note that the table in the paper is edited to include the relevant ouput from the "khb commands"


**Models
logit  turnout_experiment age male  townsize  kpss  econ   educ number_org follow_pol   putin_support econ_eval   , cluster(obl)
margins, dydx(_all) post
outreg2 using "perf_mechanisms.tex", replace tex(frag) dec(3) label ctitle("Duty") nonotes 
khb logit turnout_experiment  putin_support   || econ_eval ,  concomitant (age male  townsize  kpss  econ educ number_org follow_pol) vce(cluster obl)  summary ape 


logit  turnout_experiment age male  townsize  kpss  econ   educ number_org follow_pol   putin_support change_econ   , cluster(obl)
margins, dydx(_all) post
outreg2 using "perf_mechanisms.tex", append tex(frag) dec(3) label ctitle("Duty") nonotes 
khb logit turnout_experiment  putin_support   || change_econ ,  concomitant (age male  townsize  kpss  econ educ number_org follow_pol) vce(cluster obl)  summary ape 


logit  turnout_experiment age male  townsize  kpss  econ   educ number_org follow_pol   putin_support infl   , cluster(obl)
margins, dydx(_all) post
outreg2 using "perf_mechanisms.tex", append tex(frag) dec(3) label ctitle("Duty") nonotes 
khb logit turnout_experiment  putin_support   || infl ,  concomitant (age male  townsize  kpss  econ educ number_org follow_pol) vce(cluster obl)  summary ape 


logit  turnout_experiment age male  townsize  kpss  econ   educ number_org follow_pol   putin_support cauc   , cluster(obl)
margins, dydx(_all) post
outreg2 using "perf_mechanisms.tex", append tex(frag) dec(3) label ctitle("Duty") nonotes 
khb logit turnout_experiment  putin_support   || cauc ,  concomitant (age male  townsize  kpss  econ educ number_org follow_pol) vce(cluster obl)  summary ape 


logit  turnout_experiment age male  townsize  kpss  econ   educ number_org follow_pol   putin_support stab   , cluster(obl)
margins, dydx(_all) post
outreg2 using "perf_mechanisms.tex", append tex(frag) dec(3) label ctitle("Duty") nonotes 
khb logit turnout_experiment  putin_support   || stab ,  concomitant (age male  townsize  kpss  econ educ number_org follow_pol) vce(cluster obl)  summary ape 


logit  turnout_experiment age male  townsize  kpss  econ   educ number_org follow_pol   putin_support ineq   , cluster(obl)
margins, dydx(_all) post
outreg2 using "perf_mechanisms.tex", append tex(frag) dec(3) label ctitle("Duty") nonotes 
khb logit turnout_experiment  putin_support   || ineq ,  concomitant (age male  townsize  kpss  econ educ number_org follow_pol) vce(cluster obl)  summary ape 

logit  turnout_experiment age male  townsize  kpss  econ   educ number_org follow_pol   putin_support perf_index   , cluster(obl)
margins, dydx(_all) post
outreg2 using "perf_mechanisms.tex", append tex(frag) dec(3) label ctitle("Duty") nonotes 
khb logit turnout_experiment  putin_support   || perf_index ,  concomitant (age male  townsize  kpss  econ educ number_org follow_pol) vce(cluster obl)  summary ape 


***********************************Table A9***********************************
******************************************************************************


**Bring in Data
clear
cd "/Users/john/Dropbox/Turnout/TurnoutProjectNotes/WhoVotes/SurveyStuff"
use lev16_mid


*Create and name variables
gen putin_support=1 if q5A==1
replace putin_support=0 if q5A==2

gen age=qS2
gen male=1 if qS1==1
replace male=0 if qS1==2
gen educ=qS3
gen econ=qD8

gen townsize=qRNP
recode townsize (5=1) (1=5) (2=4) (4=2)


gen duty=1 if q44A_1==1
replace duty=0 if q44A_1~=1


gen patriot=1 if q59_23==1
replace patriot=0 if patriot~=1
replace patriot=. if q59_26==1


gen citizen_proud=1 if q59_11==1
replace citizen_proud=0 if citizen_proud~=1
replace citizen_proud=. if q59_26==1


label variable age "Age"
label variable male "Male"
label variable townsize "Town Size"
label variable econ "Economic Status"
label variable educ "Education"
label variable putin_support "Putin Support (Binary)"
label variable citizen_proud "Proud Citizen of Russia"
label variable patriot "Proud Patriot of My Country"


**Table A9
logit  duty age male  townsize   econ  educ  putin_support patriot, cluster(qOBL)
margins, dydx(_all) post
outreg2 using "pat.tex", replace tex(frag) dec(3) label ctitle("2016 Levada Omnibus: Duty") nonotes 
logit  duty age male  townsize   econ  educ  putin_support citizen_proud, cluster(qOBL)
margins, dydx(_all) post
outreg2 using "pat.tex", append tex(frag) dec(3) label ctitle("2016 Levada Omnibus: Duty") nonotes 



***********************************Table A10***********************************
******************************************************************************


***2014 Regional Survey FRS
clear


cd "/Users/john/Dropbox/Turnout/TurnoutProjectNotes/WhoVotes/SurveyStuff"
use FRS_2014_SurveySelection.dta

logit appputin russian age male citysize  familyecon edu, cluster(region)
margins, dydx(_all) post
outreg2 using "rus.tex", replace tex(frag) dec(3) label ctitle("2014 FRS: Putin Support") nonotes 





***2016 RES
clear
cd "/Users/john/Dropbox/Turnout/TurnoutProjectNotes/WhoVotes/SurveyStuff"

use Final_Replication_Data

label variable russian "Ethnic Russian"
rename townsize citysize
rename econ familyecon
rename educ edu

gen appputin=1 if putin_support>3 & putin_support!=.
replace appputin=0 if putin_support<4  & putin_support!=.
label variable appputin "Putin Support"

logit appputin russian age male citysize  familyecon edu , cluster(region)
margins, dydx(_all) post
outreg2 using "rus.tex", append tex(frag) dec(3) label ctitle("2016 RES: Putin Support") nonotes 



***2014 Regional Survey FRS
clear

cd "/Users/john/Dropbox/Turnout/TurnoutProjectNotes/WhoVotes/SurveyStuff"
use FRS_2014_SurveySelection.dta

logit appputin rusforrus age male citysize  familyecon edu, cluster(region)
margins, dydx(_all) post
outreg2 using "rus.tex", append tex(frag) dec(3) label ctitle("2014 FRS: Putin Support") nonotes 



***********************************Table A11***********************************
******************************************************************************


***2016 RES
clear
cd "/Users/john/Dropbox/Turnout/TurnoutProjectNotes/WhoVotes/SurveyStuff"

use Final_Replication_Data

label variable russian "Ethnic Russian"
rename townsize citysize
rename econ familyecon
rename educ edu

gen appputin=1 if putin_support>3 & putin_support!=.
replace appputin=0 if putin_support<4  & putin_support!=.
label variable appputin "Putin Support"

reg crimea russian age male  citysize   familyecon   edu  , cluster(obl) 
outreg2 using "rus_pat.tex", replace tex(frag) dec(3) label ctitle("2016 RES: Crimea Support") nonotes 


***2014 Regional Survey FRS

clear

cd "/Users/john/Dropbox/Turnout/TurnoutProjectNotes/WhoVotes/SurveyStuff"
use FRS_2014_SurveySelection.dta

reg patriot russian age male citysize  familyecon edu, cluster(region)
margins, dydx(_all) post
outreg2 using "rus_pat.tex", append tex(frag) dec(3) label ctitle("2014 FRS: Feel More Patriotic than Most") nonotes 



***********************************Table A12***********************************
******************************************************************************

clear
cd "/Users/john/Dropbox/Turnout/TurnoutProjectNotes/WhoVotes/SurveyStuff"

use Final_Replication_Data


logit turnout_experiment age male  townsize  kpss  econ   educ number_org follow_pol putin_support   food , cluster(obl)
margins, dydx(_all) post
outreg2 using "placebo.tex", replace tex(frag) dec(3) label ctitle("Duty") nonotes 

logit turnout_experiment age male  townsize  kpss  econ   educ number_org follow_pol putin_support   syria , cluster(obl)
margins, dydx(_all) post
outreg2 using "placebo.tex", append tex(frag) dec(3) label ctitle("Duty") 

logit turnout_experiment age male  townsize  kpss  econ   educ number_org follow_pol putin_support   child , cluster(obl)
margins, dydx(_all) post
outreg2 using "placebo.tex", append tex(frag) dec(3) label ctitle("Duty") 

logit turnout_experiment age male  townsize  kpss  econ   educ number_org follow_pol putin_support  term , cluster(obl)
margins, dydx(_all) post
outreg2 using "placebo.tex", append tex(frag) dec(3) label ctitle("Duty") 

logit turnout_experiment age male  townsize  kpss  econ  educ number_org follow_pol putin_support   pension , cluster(obl)
margins, dydx(_all) post
outreg2 using "placebo.tex", append tex(frag) dec(3) label ctitle("Duty") 


***********************************Table A13***********************************
******************************************************************************



logit turnout_experiment age male  townsize  kpss  econ   educ number_org voted follow_pol , cluster(obl)
margins, dydx(_all) post
outreg2 using "votecontrol.tex", replace tex(frag) dec(3) label ctitle("Duty") nonotes 


logit turnout_experiment age male  townsize  kpss  econ   educ number_org voted follow_pol    russia_democ , cluster(obl)
margins, dydx(_all) post
outreg2 using "votecontrol.tex", append tex(frag) dec(3) label ctitle("Duty")  

logit turnout_experiment age male  townsize  kpss  econ   educ number_org voted follow_pol    democ_good , cluster(obl)
margins, dydx(_all) post
outreg2 using "votecontrol.tex", append tex(frag) dec(3) label ctitle("Duty")  

logit turnout_experiment age male  townsize  kpss  econ   educ number_org voted follow_pol   democ_good russia_democ interact , cluster(obl)
margins, dydx(_all) post
outreg2 using "votecontrol.tex", append tex(frag) dec(3) label ctitle("Duty")  


logit  turnout_experiment age male  townsize  kpss  econ   educ number_org voted follow_pol   putin_support  , cluster(obl)
margins, dydx(_all) post
outreg2 using "votecontrol.tex", append tex(frag) dec(3) label ctitle("Duty")  



***********************************Sequential G-Estimation Findings***********
******************************************************************************



 
*Putin_support as treatment
#delimit ;
	regress turnout_experiment age male  townsize  kpss  econ     educ number_org   putin_support voted ;
	gen k= _b[voted]*voted;
	gen ytilde = turnout_experiment - k;
	regress ytilde age male  townsize  kpss  econ   educ number_org  putin_support ;
#delimit cr

**Boostrapping
capture program drop deboot
program define deboot, rclass
	#delimit ;
	regress turnout_experiment age male  townsize  kpss  econ   educ number_org follow_pol  putin_support voted ;
	replace k= _b[voted]*voted;
	replace ytilde = turnout_experiment - k;
	regress ytilde age male  townsize  kpss  econ   educ number_org follow_pol putin_support ;
	return scalar d = _b[putin_support];
	#delimit cr
end

bootstrap deffect=r(d), reps(100): deboot




***********************************Table A14***********************************
******************************************************************************


*2011
clear
cd "/Users/john/Dropbox/Turnout/TurnoutProjectNotes/WhoVotes/SurveyStuff"
use lev11_post

gen duty=1 if q31_1==1
replace duty=0 if q31_1==0
replace duty=. if q31_9==1


gen age=qS2
gen male=1 if qS1==1
replace male=0 if qS1==2
gen educ=qS3
gen econ=qD8

gen townsize=n_pun
recode townsize (5=1) (1=5) (2=4) (4=2)



gen putin_support=1 if q4B==1
replace putin_support=0 if q4B==2



label variable age "Age"
label variable male "Male"
label variable townsize "Town Size"
label variable econ "Economic Status"
label variable educ "Education"
label variable putin_support "Putin Support (Binary)"

logit  duty age male  townsize   econ  educ  putin_support, cluster(qOBL)
margins, dydx(_all) post
outreg2 using "across.tex", replace tex(frag) dec(3) label ctitle("2011 Levada Omnibus: Duty") nonotes 



*2012
clear
cd "/Users/john/Dropbox/Turnout/TurnoutProjectNotes/WhoVotes/SurveyStuff"
use lev12
gen duty=1 if q41_1==1
replace duty=0 if q41_1==0
replace duty=. if q41_11==1

gen putin_support=1 if q4B==1
replace putin_support=0 if q4B==2

gen age=qS2
gen male=1 if qS1==1
replace male=0 if qS1==2
gen educ=qS3
gen econ=qD8
replace econ=. if econ==0

gen townsize=qRNP
recode townsize (5=1) (1=5) (2=4) (4=2)


label variable age "Age"
label variable male "Male"
label variable townsize "Town Size"
label variable econ "Economic Status"
label variable educ "Education"
label variable putin_support "Putin Support(Binary)"

logit  duty age male  townsize   econ  educ  putin_support, cluster(qOBL)
margins, dydx(_all) post
outreg2 using "across.tex", append tex(frag) dec(3) label ctitle("2012 Levada Omnibus: Duty") nonotes 





***2014
clear
cd "/Users/john/Dropbox/Turnout/TurnoutProjectNotes/WhoVotes/SurveyStuff"
use lev14

gen duty=1 if qC2==1
replace duty=0 if qC2~=1
replace duty=. if qC2==99
replace duty=. if qC2==.


gen putin_support=1 if q3A==1
replace putin_support=0 if q3A==2

gen age=qS2
gen male=1 if qS1==1
replace male=0 if qS1==2
gen educ=qS3
gen econ=qD8
replace econ=. if econ==0


gen townsize=qRNP
recode townsize (5=1) (1=5) (2=4) (4=2)


label variable age "Age"
label variable male "Male"
label variable townsize "Town Size"
label variable econ "Economic Status"
label variable educ "Education"
label variable putin_support "Putin Support(Binary)"

logit  duty age male  townsize   econ  educ  putin_support, cluster(qOBL)
margins, dydx(_all) post
outreg2 using "across.tex", append tex(frag) dec(3) label ctitle("2014 Levada Omnibus: Duty") nonotes 



****2018 (why did you vote?)
clear
cd "/Users/john/Dropbox/Turnout/TurnoutProjectNotes/WhoVotes/SurveyStuff"
use lev18

gen age=qS2
gen male=1 if qS1==1
replace male=0 if qS1==2
gen educ=qS3
gen econ=qD8
replace econ=. if econ==0

gen townsize=qRNP
recode townsize (5=1) (1=5) (2=4) (4=2)

gen putin_support=1 if q3A==1
replace putin_support=0 if q3A==2

gen duty=1 if q9_3==1
replace duty=0 if q9_3==0
replace duty=. if q9_10==1


label variable age "Age"
label variable male "Male"
label variable townsize "Town Size"
label variable econ "Economic Status"
label variable educ "Education"
label variable putin_support "Putin Support(Binary)"


logit  duty age male  townsize   econ  educ  putin_support, cluster(qOBL)
margins, dydx(_all) post
outreg2 using "across.tex", append tex(frag) dec(3) label ctitle("2018 Levada Omnibus: Duty") nonotes 


***********************************Table A15***********************************
******************************************************************************
clear
cd "/Users/john/Dropbox/Turnout/TurnoutProjectNotes/WhoVotes/SurveyStuff"

use Final_Replication_Data




*These districtions dropped to avoid separation issues in fixed effect model.
logit  turnout_experiment age male  townsize  kpss  econ   educ number_org follow_pol  putin_support i.okrug  if okrug~=148 & okrug~=128 & okrug~=163 & okrug~=37 & okrug~=101 & okrug~=119 & okrug~=127 & okrug~=160 & okrug~=171 & okrug~=175 & okrug~=175 & okrug~=179 & okrug~=201 & okrug~=205 & okrug~=92
margins, dydx(_all) post
outreg2 using "smd.tex", replace tex(frag) dec(3) label ctitle("Duty") drop(i.okrug) nonotes

logit  turnout_experiment age male  townsize  kpss  econ   educ number_org follow_pol  putin_support  smd_winner_margin f , cluster(obl)
margins, dydx(_all) post
outreg2 using "smd.tex", append tex(frag) dec(3) label ctitle("Duty") nonotes
